home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 12 / 012.d81 / t.three deep.boo < prev    next >
Text File  |  2022-08-26  |  1KB  |  91 lines
  1.  
  2.         *** THREE DEEP ***
  3.  
  4.  
  5.  
  6.  
  7. Written by:  Thomas Foster
  8.  
  9.  
  10. Alpha Order Sort
  11. Commodore Microcomputers, June 1985
  12. Page 6
  13.  
  14.  
  15.  
  16.   Here is a great routine to speed up
  17.  
  18. those long, never-ending sorts.  It is
  19.  
  20. based upon the Distribution Counting
  21.  
  22. method of sorting.  The original
  23.  
  24. Distribution sort only sorted by the
  25.  
  26. first character in an element.  This
  27.  
  28. version, however, sorts by the first
  29.  
  30. three characters of an element.
  31.  
  32.   To use this routine, tack it into
  33.  
  34. your own program.  Then, merely GOSUB
  35.  
  36. to it.  You will be amazed at the
  37.  
  38. speed of the sort.  You must have
  39.  
  40. already dimensioned and initialized
  41.  
  42. the arrays A$(), B$(), and C().  If
  43.  
  44. you only want to sort A$(), simply
  45.  
  46. remove all references to B$(), BB$(),
  47.  
  48. BC$(), BD$(), C(), CC(), CD(), and
  49.  
  50. CE().  The lines which will be
  51.  
  52. affected by this are 7010, 7055, 7110,
  53.  
  54. 7155, 8010, and 8055.
  55.  
  56.  *** NOTE ***
  57.  
  58. Because of the nature of this program,
  59.  
  60. you can not RUN it from the LOADSTAR
  61.  
  62. environment.  This program is intended
  63.  
  64. to be used only as a sub-routine.
  65.  
  66.  
  67.    This program is copyrighted by
  68.  
  69.  Microcomputers Magazine.  All rights
  70.  
  71.   to it are reserved.  LOADSTAR has
  72.  
  73. relieved you from the burden of keying
  74.  
  75.          in this program.
  76.  
  77.  
  78.          For more complete
  79.  
  80. information about this program, refer
  81.  
  82.      to the June 1985 issue of
  83.  
  84.      Microcomputers Magazine.
  85.  
  86.  
  87.  
  88. >Files used: THREE DEEP
  89.  
  90. --------------------------------------
  91.